home *** CD-ROM | disk | FTP | other *** search
Text File | 1992-12-08 | 3.9 KB | 284 lines | [TEXT/????] |
- This test of floating-point arithmetic is likely to show
- differences from platform to platform because of differences
- in floating-point precision and details of the routines that
- convert floating-point numbers to strings. If the values
- produced in local tests are approximately the same in magnitude
- as shown in the standard results, there's nothing to worry about.
- In addition, some platforms may show 0.0 as "-0.0". You can
- ignore this if you wish.
- 0.21132
- 0.41242
- 0.31579
- 0.51044
- 0.42173
- 0.30569
- 0.07960
- 0.73752
- 0.05072
- 0.71694
- every 1 to 10 do write(?0) ----> none
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- 2.0
- every i := 1 to 50 do write(real(repl("0",i) || "2.")) ----> none
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- 2
- every i := 1 to 30 do write(integer(repl("0",i) || "2")) ----> none
- 2.0 ~=== +2.0 ----> none
- abs(3.0) ----> 3.0
- Image(2e13) ----> "2.e+13"
- Image(0.0006) ----> "0.0006"
- Image(2.0) ----> "2.0"
- integer(2.0) ----> 2
- integer(2.7) ----> 2
- integer(".") ----> none
- integer(".3") ----> 0
- integer("0.3") ----> 0
- integer(" . 3") ----> none
- integer("e2") ----> none
- integer("3e500") ----> none
- numeric(2.0) ----> 2.0
- numeric(2.7) ----> 2.7
- numeric(".") ----> none
- numeric(".3") ----> 0.3
- numeric("0.3") ----> 0.3
- numeric(" . 3") ----> none
- numeric("e2") ----> none
- numeric("3e500") ----> none
- real(2) ----> 2.0
- real(2.0) ----> 2.0
- real(2.7) ----> 2.7
- real("2") ----> 2.0
- real(" 2") ----> 2.0
- real("2 ") ----> 2.0
- real("+2") ----> 2.0
- real("-2") ----> -2.0
- real("- 2") ----> none
- real(" - 2 ") ----> none
- real("") ----> none
- real("--2") ----> none
- real(" ") ----> none
- real("-") ----> none
- real("+") ----> none
- real(".") ----> none
- real(".3") ----> 0.3
- real("0.3") ----> 0.3
- real(" . 3") ----> none
- real("e2") ----> none
- real("3e500") ----> none
- real("7r4") ----> 4.0
- real("4r7") ----> none
- real("4r 7") ----> none
- real("7r 4") ----> none
- real("16rff") ----> 255.0
- real("36rcat") ----> 15941.0
- real("36Rcat") ----> 15941.0
- real("36rCAT") ----> 15941.0
- real("1r1") ----> none
- real("2r0") ----> 0.0
- real("22222222222222222222222222222") ----> none
- numeric(2.0) ----> 2.0
- numeric(2.7) ----> 2.7
- numeric(0.3) ----> 0.3
- numeric(e2) ----> none
- 36. ^ 9 ----> 1.015599e+14
- 36 ^ 9. ----> 1.015599e+14
- 36. ^ 9. ----> 1.015599e+14
- -36. ^ 9 ----> -.101559e+15
- -36. ^ -9 ----> -9.84640e-15
- 2.0
- 22.0
- 222.0
- 2222.0
- 22222.0
- 222222.0
- 2.222222e+6
- 2.222222e+7
- 2.222222e+8
- 2.222222e+9
- 2.222222e+10
- 2.222222e+11
- 2.222222e+12
- 2.222222e+13
- 2.222222e+14
- 2.222222e+15
- 2.222222e+16
- 2.222222e+17
- 2.222222e+18
- 2.222222e+19
- 2.222222e+20
- 2.222222e+21
- 2.222222e+22
- 2.222222e+23
- 2.222222e+24
- 2.222222e+25
- 2.222222e+26
- 2.222222e+27
- 2.222222e+28
- 2.222222e+29
- 2.222222e+30
- 2.222222e+31
- 2.222222e+32
- 2.222222e+33
- 2.222222e+34
- 2.222222e+35
- 2.222222e+36
- failed
- 2.2
- 22.2
- 222.2
- 2222.2
- 22222.2
- 222222.2
- 2.222222e+6
- 2.222222e+7
- 2.222222e+8
- 2.222222e+9
- 2.222222e+10
- 2.222222e+11
- 2.222222e+12
- 2.222222e+13
- 2.222222e+14
- 2.222222e+15
- 2.222222e+16
- 2.222222e+17
- 2.222222e+18
- 2.222222e+19
- 2.222222e+20
- 2.222222e+21
- 2.222222e+22
- 2.222222e+23
- 2.222222e+24
- 2.222222e+25
- 2.222222e+26
- 2.222222e+27
- 2.222222e+28
- 2.222222e+29
- 2.222222e+30
- 2.222222e+31
- 2.222222e+32
- 2.222222e+33
- 2.222222e+34
- 2.222222e+35
- 2.222222e+36
- failed
- 3.2
- 23.2
- 223.2
- 2223.2
- 22223.2
- 222223.2
- 2.222223e+6
- 2.222222e+7
- 2.222222e+8
- 2.222222e+9
- 2.222222e+10
- 2.222222e+11
- 2.222222e+12
- 2.222222e+13
- 2.222222e+14
- 2.222222e+15
- 2.222222e+16
- 2.222222e+17
- 2.222222e+18
- 2.222222e+19
- 2.222222e+20
- 2.222222e+21
- 2.222222e+22
- 2.222222e+23
- 2.222222e+24
- 2.222222e+25
- 2.222222e+26
- 2.222222e+27
- 2.222222e+28
- 2.222222e+29
- 2.222222e+30
- 2.222222e+31
- 2.222222e+32
- 2.222222e+33
- 2.222222e+34
- 2.222222e+35
- 2.222222e+36
- failed
- 2.0 === +2.0 ----> 2.0
- ?30.0 ----> 5
- copy(1.0) ----> 1.0
- trim(3.14159,58) ----> "3.14159"
- Image(2e13) ----> "2.e+13"
- Image(0.0006) ----> "0.0006"
-